home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
xaggerate
< prev
next >
Wrap
Text File
|
1999-06-15
|
622b
|
26 lines
Category: Filter Factory Gallery G
Title: Xaggerate...
Author: Kipp McMichael
Copyright: Copyright © Kipp McMichael
ctl[0]: \\ waves
ctl[1]: put((abs(get(2))<val(6,0,val(7,0,X)/2))&&(abs(get(3))<val(6,0,val(7,0,X)/2)),1), get(1)==1?c:get(0)<128?c*get(0)/128:(c-128)*2+get(0)-((c-128)*2)*get(0)/255
ctl[2]:
ctl[3]:
ctl[4]:
ctl[5]:
ctl[6]:
ctl[7]:
val[0]: 50
val[1]: 32
val[2]: 0
val[3]: 0
val[4]: 0
val[5]: 1
val[6]: 3
val[7]: 0
R:src(x-(x-y)*(y-x)%val(0,0,X),y-(x+y)*(y+x)%val(1,0,X),z)
G:src(x-(x-y)*(y-x)%val(0,0,X),y-(x+y)*(y+x)%val(1,0,X),z)
B:src(x-(x-y)*(y-x)%val(0,0,X),y-(x+y)*(y+x)%val(1,0,X),z)
A:a